Cubase Magazine 26/Issue #26.iso/2-SOFTWARE/TUAREG FAT 1.5/_SETUP.1/Tuareg.exe/0/RCDATA/TPITCHFORM/TPITCHFORM.txt

Text File | 2000-08-10 | 5KB | 282 lines

object pitchForm: TpitchForm
  Left = 540
  Top = 409
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Pitch a stream'
  ClientHeight = 177
  ClientWidth = 382
  Color = 4874571
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object richel: TImage
    Left = 16
    Top = 32
    Width = 315
    Height = 8
    AutoSize = True
    Picture.Data = {<image000.bmp>}
  end
  object pitchGrip: TImage
    Left = 168
    Top = 33
    Width = 15
    Height = 6
    AutoSize = True
    Picture.Data = {<image001.bmp>}
    OnMouseDown = pitchGripMouseDown
    OnMouseMove = pitchGripMouseMove
  end
  object Label1: TLabel
    Left = 16
    Top = 57
    Width = 84
    Height = 14
    Caption = 'Preset pitches:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label2: TLabel
    Left = 16
    Top = 9
    Width = 58
    Height = 14
    Caption = 'Pitch/tune:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label3: TLabel
    Left = 16
    Top = 88
    Width = 30
    Height = 14
    Caption = 'Tuned'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Label4: TLabel
    Left = 16
    Top = 120
    Width = 40
    Height = 14
    Caption = 'Fit into...'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object factorLabel: TLabel
    Left = 264
    Top = 57
    Width = 9
    Height = 14
    Caption = '...'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Label5: TLabel
    Left = 192
    Top = 57
    Width = 65
    Height = 14
    Caption = 'Pitch factor:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object Label7: TLabel
    Left = 192
    Top = 73
    Width = 49
    Height = 14
    Caption = 'Duration:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Transparent = True
  end
  object durationLabel: TLabel
    Left = 264
    Top = 73
    Width = 9
    Height = 14
    Caption = '...'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object measureLabel: TLabel
    Left = 264
    Top = 89
    Width = 9
    Height = 14
    Caption = '...'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object okBtn: TButton
    Left = 296
    Top = 144
    Width = 75
    Height = 25
    Caption = 'Ok'
    Default = True
    ModalResult = 1
    TabOrder = 0
  end
  object klavierBox: TComboBox
    Left = 72
    Top = 85
    Width = 89
    Height = 21
    Color = 10656960
    ItemHeight = 13
    TabOrder = 1
    Text = '- - -'
    OnChange = klavierBoxChange
    Items.Strings = (
      '- - -'
      'C 1'
      'C# 1'
      'D 1'
      'D# 1'
      'E 1'
      'F 1'
      'F# 1'
      'G 1'
      'G# 1'
      'A 1'
      'A# 1'
      'B 1'
      'C 2'
      'C# 2'
      'D 2'
      'D# 2'
      'E 2'
      'F 2'
      'F# 2'
      'G 2'
      'G# 2'
      'A 2'
      'A# 2'
      'B 2'
      'C 3'
      'C# 3'
      'D 3'
      'D# 3'
      'E 3'
      'F 3'
      'F# 3'
      'G 3'
      'G# 3'
      'A 3'
      'A# 3'
      'B 3'
      'C 4'
      'C# 4'
      'D 4'
      'D# 4'
      'E 4'
      'F 4'
      'F# 4'
      'G 4'
      'G# 4'
      'A 4'
      'A# 4'
      'B 4')
  end
  object timeBox: TComboBox
    Left = 72
    Top = 117
    Width = 89
    Height = 21
    Color = 10656960
    ItemHeight = 13
    TabOrder = 2
    Text = '- - -'
    OnChange = timeBoxChange
    Items.Strings = (
      '1/2 measure'
      '1 measure'
      '2 measures'
      '3 measures'
      '4 measures'
      '5 measures'
      '6 measures'
      '7 measures'
      '8 measures'
      '9 measure'
      '10 measures'
      '11 measures'
      '12 measures'
      '13 measures'
      '14 measures'
      '15 measures'
      '16 measures'
      '17 measures'
      '18 measures'
      '19 measures'
      '20 measures'
      '21 measures'
      '22 measures'
      '23 measures'
      '24 measures'
      '25 measures'
      '26 measures'
      '27 measures'
      '28 measures'
      '29 measures'
      '30 measures'
      '31 measures'
      '32 measures')
  end
end